home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 17 / Developer Source Volume 17 (I-MODE Publications, Inc.)(2000).iso / delpp / fig5-03.gif < prev    next >
Graphics Interchange Format  |  1996-11-19  |  29.1 KB  |  640x480  |  4-bit (14 colors)
   ocr: i Delphi 2.0 Projectl Unitl.pas -X File Edit Search View Project Bui Unit1 unit Unitl; interrace Object Inspector A uses Form1: TForm1 Windows, Messages, YsUt11s, Classes, sraphics, Cont Properties Events type ActiveControl TForml == class (TForm) AutoScroll True private +Borderlcons biSystemMenu, I - Private aeclarations ) BorderStyle bsSizeable public Caption Form1 - - Public aeclarations 1 ClientHeight 273 end; Clientwidth 427 Color clBtnFace var CH3D True Forml: TForml; Cursor crDefault Enabled True implementation +Font (TFont) FormStyle fsNormal ($R *.DEMI Height 300 end. 22: 1 Modified I ...